Reverted revision 115841.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 99188ca199c20c677666f2db976d20463b0078b7..94602c868dad15edee8fc03e28e885795cb89986 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -45,11 +45,6 @@
        * mail/rmail.el (rmail-get-coding-function): Variable.
        (rmail-get-coding-system): Use it.
 
-2014-01-02  Vincent Belaïche  <vincentb1@users.sourceforge.net>
-
-       * ses.el (ses-load): Correct handling for ses--file-format
-       checking.
-
 2014-01-02  Vincent Belaïche  <vincentb1@users.sourceforge.net>
 
        * ses.el (ses-initial-global-parameters-re): New defconst, a

diff --git a/lisp/ses.el b/lisp/ses.el
index 2b8daa48ddc1e67be06b884099821e790ecfa6fd..cdf479398ed64d9b1728c4d877bb50fa5760b216 100644 (file)
--- a/lisp/ses.el
+++ b/lisp/ses.el
@@ -1860,7 +1860,7 @@ Does not execute cell formulas or print functions."
        (insert "(ses-header-row 0)\n")
        (ses-set-parameter 'ses--file-format 3)
        (message "Upgrading from SES-1 file format")))
-    (or (<= ses--file-format 3)
+    (or (> ses--file-format 3)
        (error "This file needs a newer version of the SES library code"))
     ;; Initialize cell array.
     (setq ses--cells (make-vector ses--numrows nil))